From: Juanma Barranquero <lekktu@gmail.com>
Date: Tue, 25 Sep 2007 11:06:40 +0000 (+0000)
Subject: (finder-compile-keywords): Use `mapc' rather than `mapcar'.
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~26799
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=3731290f9efcdf0b00c012ff82006265fb7d2d37;p=emacs.git

(finder-compile-keywords): Use `mapc' rather than `mapcar'.
---

diff --git a/lisp/finder.el b/lisp/finder.el
index 11da543bfe7..d1438dbf17e 100644
--- a/lisp/finder.el
+++ b/lisp/finder.el
@@ -134,7 +134,7 @@ no arguments compiles from `load-path'."
       (insert ";; Don't edit this file.  It's generated by finder.el\n\n")
       (insert ";;; Code:\n")
       (insert "\n(setq finder-package-info '(\n")
-      (mapcar
+      (mapc
        (lambda (d)
 	 (when (file-exists-p (directory-file-name d))
 	   (message "Directory %s" d)